home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Compute! Gazette 1987 November
/
1987-11.d64
/
crystal clear
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-09-20
|
2KB
|
87 lines
10 rem copyright 1987 compute! publications, inc. - all rights reserved
20 print" copyright 1987 compute! pub., inc."
30 printtab(10)"all rights reserved"
40 fori=49152to49633:reada:pokei,a:x=x+a:next
50 ifx<>58435thenprint"error in data statements.":stop
60 data76,177,192,76,191,192
70 data76,203,192,76,217,192
80 data76,246,192,76,4,193
90 data76,76,193,76,88,193
100 data76,152,193,76,166,193
110 data165,251,133,105,165,252
120 data133,106,165,2,133,107
130 data32,89,192,165,253,145
140 data108,165,254,145,110,198
150 data107,240,31,165,108,24
160 data109,16,193,133,108,165
170 data109,105,0,133,109,165
180 data110,24,109,16,193,133
190 data110,165,111,105,0,133
200 data111,76,45,192,96,169
210 data0,133,39,165,106,133
220 data38,10,38,39,10,38
230 data39,10,38,39,133,40
240 data165,39,133,41,165,40
250 data10,38,39,10,38,39
260 data24,101,40,133,38,165
270 data39,101,41,133,39,169
280 data0,24,101,38,133,108
290 data169,4,101,39,133,109
300 data169,0,24,101,38,133
310 data110,169,216,101,39,133
320 data111,164,105,96,32,178
330 data193,169,40,141,16,193
340 data169,0,133,252,169,25
350 data133,2,96,32,160,192
360 data162,0,32,187,193,232
370 data224,20,208,248,96,32
380 data160,192,162,19,32,187
390 data193,202,16,250,96,32
400 data160,192,162,0,32,198
410 data193,232,224,40,208,248
420 data96,32,160,192,162,39
430 data32,198,193,202,16,250
440 data96,32,178,193,169,1
450 data141,16,193,169,0,133
460 data251,169,40,133,2,96
470 data32,229,192,162,0,32
480 data206,193,232,224,25,208
490 data248,96,32,229,192,162
500 data24,32,206,193,202,16
510 data250,96,0,0,173,12
520 data3,141,17,193,240,15
530 data173,17,208,48,251,173
540 data17,208,16,251,206,17
550 data193,208,241,96,32,68
560 data193,32,30,192,76,68
570 data193,32,60,193,32,30
580 data192,76,60,193,169,24
590 data56,229,252,133,252,96
600 data169,39,56,229,251,133
610 data251,96,32,229,192,162
620 data12,32,214,193,202,16
630 data250,96,32,229,192,162
640 data0,32,214,193,232,224
650 data13,208,248,96,138,133
660 data252,133,251,169,40,141
670 data16,193,169,25,56,229
680 data252,56,229,252,133,2
690 data32,30,192,32,42,193
700 data169,1,141,16,193,169
710 data40,56,229,252,56,229
720 data252,133,2,32,30,192
730 data32,51,193,76,18,193
740 data32,229,192,162,0,32
750 data102,193,232,224,13,208
760 data248,96,32,229,192,162
770 data12,32,102,193,202,16
780 data250,96,134,253,132,254
790 data169,19,76,202,241,134
800 data251,32,30,192,32,42
810 data193,76,18,193,134,251
820 data32,30,192,76,18,193
830 data134,252,32,30,192,76
840 data18,193,134,252,32,30
850 data192,32,51,193,76,18
860 data193,193,202,16,250,96